home *** CD-ROM | disk | FTP | other *** search
- ;; MLYM-OTF.flt -- Font Layout Table for Malayalam OpenType font
- ;; Copyright (C) 2003, 2004, 2005, 2007, 2008 AIST (H15PRO112)
- ;; See the end for copying conditions.
-
- (font layouter mlym-otf nil
- (font (nil nil unicode-bmp :otf=mlym=akhn)))
-
- ;;; <li> MLYM-OTF.flt
- ;;;
- ;;; For Malayalam OpenType fonts to draw the reformed Malayalam script.
-
- ;; Tested with the following fonts. All of these fonts require Halant
- ;; movement for syllable-final YA and VA, but not for RA and LA.
-
- ;; AnjaliOldLipi.ttf
- ;; Dyuthi3.ttf
- ;; Kalyani121.ttf
- ;; Meera_04.ttf
- ;; Rachana_04.ttf
- ;; RaghuMalayalamSans2.ttf
- ;; suruma2.ttf
-
- (category
- ;; C: ordinary consonants (except P)
- ;; P: consonants that have a post form
- ;; H: HALANT
- ;; m: vowel sign (pre)
- ;; b: vowel sign (below)
- ;; p: vowel sign (post)
- ;; A: vowel modifier (post)
- ;; V: independent vowel
- ;; N: ZWNJ (ZERO WIDTH NON-JOINER)
- ;; J: ZWJ (ZERO WIDTH JOINER)
- ;; Z: internal use
- ;; X: generic
- (0x0D00 0x0D7F ?X) ; generic
- (0x0D00 ?Z) ; internal use
- (0x0D02 0x0D03 ?A) ; SIGN ANUSVARA .. VISARGA
- (0x0D05 0x0D14 ?V) ; LETTER A .. AU
- (0x0D15 0x0D39 ?C) ; LETTER KA .. HA
- (0x0D2F ?P) ; LETTER YA
- (0x0D35 ?P) ; LETTER VA
- (0x0D3E 0x0D44 ?p) ; VOWEL SIGN AA .. VOCALIC RR
- (0x0D46 0x0D48 ?m) ; VOWEL SIGN E .. AI
- (0x0D4D ?H) ; SIGN VIRAMA
- (0x0D57 ?p) ; AU LENGTH MARK
- (0x0D60 0x0D61 ?V) ; LETTER VOCALIC RR .. VOCALIC LL
- (0x0D62 0x0D63 ?b) ; VOWEL SIGN VOCALIC L .. LL
- (0x0964 0x0965 ?X) ; DANDA .. DOUBLE DANDA
- (0x200C ?N) ; ZWNJ
- (0x200D ?J) ; ZWJ
- )
-
- ;; Stage 0
- ;; Decompose two-part vowels.
- (generator
- (0
- (cond
- ((0x0D4A)
- 0x0D46 0x0D3E)
- ((0x0D4B)
- 0x0D47 0x0D3E)
- ((0x0D4C)
- 0x0D46 0x0D57)
- ("." =))
- *))
-
- ;; Stage 1
- ;; Syllable identification and reordering.
- ;; Put the mark Z after the base consonant.
- (generator
- (0
- (cond
- ;; A syllable with a left vowel sign.
- ;;1 2 3 4
- ("([CP](H[CP])*)(m)(p?A?)"
- < | (3 =) (1 move-h) (4 = *) | >)
-
- ;; A syllable with a right vowel sign, a below vowel sign
- ;; and/or a vowel modifier.
- ;;1 2 3
- ("([CP](H[CP])*)(bA?|pA?|A)"
- < | (1 move-h) (3 = *) | >)
-
- ;; Forced chillu form.
- ;;1 2 3
- ("([CP](H[CP])*)(HJ)"
- < | (1 move-h) (3 = =) | >)
-
- ;; A syllable with no vowel signs/modifiers, optionally followed by
- ;; an H or an HN.
- ;;1 2 3
- ("([CP](H[CP])*)(H|HN)?"
- < | (1 move-h) (3 0x0D4D) | >)
-
- ;; Starting with an independent vowel.
- ("VA?"
- < | (0 = *) | >)
-
- ("." =))
- *)
-
-
- ;; Move the halant that follows the base consonant to the end.
- (move-h
- (cond
- ;; All consonants are P's.
- ("(P)(H)([PH]*)$"
- (1 =) 0x0D00 (3 = *) (2 =))
-
- ;; One or more Non-P consonants.
- ("([CPH]*C)(H)([PH]+)$"
- (1 = *) 0x0D00 (3 = *) (2 =))
-
- ;; Otherwise, final consonant is not P. No need to move H.
- (".+"
- = * 0x0D00)))
- )
-
- ;; Stage 2
- ;; Apply GSUB features.
- (generator
- (0
- (cond
- ;; The tested fonts make LA's below form with 1. 'half' + 'blws',
- ;; 2. 'half' + 'pres' or 3. 'akhn'.
- ;; 1 2 3 4
- (" (m)?([CPH]*)(Z)([PHbpAJ]*) "
- | (1 =) (2 otf:mlym=akhn,half,pstf,pres,abvs,blws+) (3 =)
- (4 otf:mlym=pstf+) |)
-
- ("." =))
- *))
-
- ;; Stage 3
- ;; Second reordering. If there are glyphs before the base, move left
- ;; vowel sign to the left of the base.
- (generator
- (0
- (cond
- ;; 1 2 3 4
- (" (m)?([^Z ]*)([^Z])Z([^ ]*) "
- | (2 = *) (1 =) (3 =) (4 = *) |)
-
- ("." =))
- *))
-
- ;; Stage 4
- ;; Apply remaining GSUB and GPOS features to all syllables. To get
- ;; correct Y.YA and V.VA conjunctions, we must apply 'psts' to the
- ;; entire syllable.
- (generator
- (0
- (cond
- (" ([^ ]+) "
- (1 otf:mlym=psts,haln+abvm,blwm,dist))
- ("."
- [ = ]))
- *))
-
- ;; Copyright (C) 2003, 2004, 2005, 2007, 2008
- ;; National Institute of Advanced Industrial Science and Technology (AIST)
- ;; Registration Number H15PRO112
-
- ;; This file is part of the m17n database; a sub-part of the m17n
- ;; library.
-
- ;; The m17n library is free software; you can redistribute it and/or
- ;; modify it under the terms of the GNU Lesser General Public License
- ;; as published by the Free Software Foundation; either version 2.1 of
- ;; the License, or (at your option) any later version.
-
- ;; The m17n library is distributed in the hope that it will be useful,
- ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
- ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- ;; Lesser General Public License for more details.
-
- ;; You should have received a copy of the GNU Lesser General Public
- ;; License along with the m17n library; if not, write to the Free
- ;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
- ;; Boston, MA 02110-1301, USA.
-
- ;; Local Variables:
- ;; mode: emacs-lisp
- ;; End:
-